## 
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
## 
##     filter, lag
## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union
## 
## Attaching package: 'dbplyr'
## The following objects are masked from 'package:dplyr':
## 
##     ident, sql
# Enter the name of the database file you want to analyze
db_name = "test4.db"
db <- DBI::dbConnect(RSQLite::SQLite(), db_name)
plotIterationNums(0, 2 * 10 ** 6)

plotPricesByPeriod()

plotPricesByTransaction(20)